|
Inventor VBA : und-color: #FFFF99'>Suchen und Markieren im Modellbaum
PamaCad am 02.04.2020 um 09:18 Uhr (1)
Guten TagNach Jahren der Enthaltsamkeit versuche ich mich wieder in der VBA-Programmierung.Als erstes würde ich gerne im Modellbaum (das ist doch die Auflistung der in einer Assembly enthaltenen Occurences) nach dem Displaynamen ein gesuchtes Objekt und-color: #FFFF99'>suchen und markieren. und-color: #FFFF99'>Suchen in den Occurences geht ja, rekursiv durchlaufen, aber wie kann ich dann im Inventor das gefundene Element markieren?Ich finde kein "Select", "Activate" oder sonst etwas Hilfreiches.....GrussRoland
| | In das Form Inventor VBA wechseln |
|
Inventor VBA : und-color: #FFFF99'>Suchen und Markieren im Modellbaum
PamaCad am 03.04.2020 um 07:00 Uhr (1)
Guten MorgenZitat:Original erstellt von Frank_Schalla:Schaue dir mal den Commandmanager Execute an Guten MorgenDa finde ich keine Lösung für mich, um das Element, welches im SelectSet steht, Zoomen zu können.Es geht mir um die Umsetzung des Kontextmenübefehls "In Fenster und-color: #FFFF99'>suchen", wenn ich ein Element im Modelbaum markiert habe.Oder sehe ich wieder den Wald vor lauter Bäumen nicht?
| | In das Form Inventor VBA wechseln |
|
Inventor VBA : und-color: #FFFF99'>Suchen und Markieren im Modellbaum
PamaCad am 02.04.2020 um 14:44 Uhr (1)
Danke für den Hinweis.Ich habe es so gelöst. Aber - ?? bin ich im falschen Forum ??Kann ich das verschieben? Code: // Selektiert alle per Name übergebenen Elemente public void SelectElement(Application InvApp, string DisplayName = "", string FullFileName = "") { if (InvApp.ActiveDocumentType == DocumentTypeEnum.kAssemblyDocumentObject) { AssemblyDocument AssDoc = (Inventor.AssemblyDocument)InvApp.ActiveDocument; AssDoc.SelectSet.Clear(); foreach (ComponentOccurrence ...
| | In das Form Inventor VBA wechseln |
|
Inventor VBA : und-color: #FFFF99'>Suchen und Markieren im Modellbaum
PamaCad am 03.04.2020 um 21:27 Uhr (1)
Vielen Dank, es funktioniert.In C# habe ich folgende Syntax eingesetzt:Code:// Das Element, welches gezoomt werde soll, ist dem SelectSet vorgängig zugeilt worden.// InvApp ist die aktuell aktive Inventor Applikation, welche der Funktion übergeben wird. ControlDefinition ControlDef = InvApp.CommandManager.ControlDefinitions["AppZoomSelectCmd"]; ControlDef.Execute();Somit wird auf das Element gezoomt, wobei es je nach Ansicht natürlich hinter irgend so einem Blech verborgen bleibt. Aber das Ziel ist erfül ...
| | In das Form Inventor VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |